Een procedure Sub schrijven

   

Een procedure Sub is een serie Visual Basic-instructies die zich tussen de instructies Sub en End Sub bevindt. Een procedure Sub voert acties uit maar geeft geen waarden als resultaat. Een procedure Sub kan argumenten als constanten, variabelen of expressies bevatten die door een oproepende procedure zijn aangevoerd. Als een procedure Sub geen argumenten heeft, moeten in de instructie Sub twee haakjes zonder inhoud staan.

De volgende procedure Sub bevat opmerkingen die bij elke regel uitleg verschaffen.

' Declareert een procedure met de naam GetInfo
' Deze procedure Sub bevat geen argumenten
Sub GetInfo()
' Declareert een tekenreeksvariabele met de naam answer
Dim answer As String
' Wijst de resultaatwaarde van de functie InputBox aan answer toe
answer = InputBox(Prompt:="Wat is uw naam?")
    ' Voorwaardelijke instructie If...Then...Else
    If answer = Empty Then
        ' Roept de functie MsgBox aan
        MsgBox Prompt:="U hebt geen naam ingevoerd."
    Else
        ' De functie MsgBox bij de variabele answer gevoegd
        MsgBox Prompt:="Uw naam is " & answer
    ' Beδindigt de instructie If...Then...Else
    End If
' Beδindigt de procedure Sub
End Sub